Profile of (eval 415)[Sub/Quote.pm:3]

Filename	(eval 415)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
Statements	Executed 32 statements in 527µs
Eval Invoked At	/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
2	2	2	91µs	104s	OpenAPI::Modern::::newOpenAPI::Modern::new
1	1	1	25µs	33µs	OpenAPI::Modern::::BEGIN@48OpenAPI::Modern::BEGIN@48
1	1	1	13µs	37µs	OpenAPI::Modern::::BEGIN@7OpenAPI::Modern::BEGIN@7
1	1	1	5µs	5µs	OpenAPI::Modern::::BEGIN@12.299OpenAPI::Modern::BEGIN@12.299
1	1	1	5µs	14µs	OpenAPI::Modern::::BEGIN@43OpenAPI::Modern::BEGIN@43

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1					{
2	2	2µs			my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
3	1	0s			my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
4	1	0s			my $isa_check_for_openapi_5fdocument = ${$_[1]->{"\$isa_check_for_openapi_5fdocument"}};
5	1	0s			my $isa_check_for_evaluator = ${$_[1]->{"\$isa_check_for_evaluator"}};
6					package OpenAPI::Modern;
7	2	43µs	2	61µs	# spent 37µs (13+24) within OpenAPI::Modern::BEGIN@7 which was called: # once (13µs+24µs) by Sub::Quote::_clean_eval at line 7 no warnings 'closure'; # spent 37µs making 1 call to OpenAPI::Modern::BEGIN@7 # spent 24µs making 1 call to warnings::unimport
8					# spent 104s (91µs+104) within OpenAPI::Modern::new which was called 2 times, avg 51.9s/call: # once (83µs+104s) by main::RUNTIME at line 177 of Sub/Defer.pm # once (8µs+1.57ms) by main::RUNTIME at line 6 of /Users/ether/git/fastly/Heavenly/profiling/jsm-0.552-om-0.031/../prof.pl sub new {
9					($_QUOTED,$_UNQUOTED) if 0;
10					# BEGIN quote_sub PRELUDE
11					package OpenAPI::Modern;
12					# spent 5µs within OpenAPI::Modern::BEGIN@12.299 which was called: # once (5µs+0s) by Sub::Quote::_clean_eval at line 17 BEGIN {
13	1	0s			$^H = 2018;
14	1	1µs			${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
15	1	4µs			%^H = (
16					);
17	1	118µs	1	5µs	} # spent 5µs making 1 call to OpenAPI::Modern::BEGIN@12.299
18					# END quote_sub PRELUDE
19	1	0s			my $invoker = CORE::shift();
20	1	1µs			my $class = CORE::ref($invoker) ? CORE::ref($invoker) : $invoker;
21	1	0s			if ($class ne "OpenAPI::Modern") {
22					if ($Moo::MAKERS{$class}) {
23					if ($Moo::MAKERS{$class}{constructor}) {
24					package OpenAPI::Modern;
25					return $invoker->SUPER::new(@_);
26					}
27					Moo->_constructor_maker_for($class);
28					return $invoker->new(@_);
29					} elsif ($INC{"Moose.pm"} and my $meta = Class::MOP::get_metaclass_by_name($class)) {
30					return $meta->new_object(
31					$class->can("BUILDARGS") ? $class->BUILDARGS(@_)
32					: $class->Moo::Object::BUILDARGS(@_)
33					);
34					}
35					}
36	1	9µs	1	104s	my $args = $class->BUILDARGS(@_); # spent 104s making 1 call to OpenAPI::Modern::BUILDARGS
37	1	7µs			Carp::croak("BUILDARGS did not return a hashref") unless CORE::ref($args) eq 'HASH';
38	1	9µs			if (my @missing = grep !exists $args->{$_}, "evaluator", "openapi_document") {
39					Carp::croak("Missing required arguments: ".CORE::join(', ', sort @missing));
40					}
41	1	8µs			my $new = bless({}, $class);;
42	1	1µs			(exists $args->{"evaluator"} and ($new->{"evaluator"} = scalar do { my $value = $args->{"evaluator"};
43	5	77µs	4	24µs	# spent 14µs (5+9) within OpenAPI::Modern::BEGIN@43 which was called: # once (5µs+9µs) by Sub::Quote::_clean_eval at line 43 (do { no warnings "void"; package Type::Tiny; ((Scalar::Util::blessed($value) and $value->isa(q[JSON::Schema::Modern]))) or Type::Tiny::_failed_check($isa_check_for_evaluator, "InstanceOf[\"JSON::Schema::Modern\"]", $value, "attribute_name","evaluator","attribute_step","isa check","mgaca","0","varname","\$args->{\"evaluator\"}"); $value }), # spent 14µs making 1 call to OpenAPI::Modern::BEGIN@43 # spent 9µs making 1 call to warnings::unimport # spent 1µs making 1 call to UNIVERSAL::isa # spent 0s making 1 call to Scalar::Util::blessed
44					$value
45					}
46					)),
47	2	56µs			(exists $args->{"openapi_document"} and ($new->{"openapi_document"} = scalar do { my $value = $args->{"openapi_document"};
48	5	184µs	4	42µs	# spent 33µs (25+8) within OpenAPI::Modern::BEGIN@48 which was called: # once (25µs+8µs) by Sub::Quote::_clean_eval at line 48 (do { no warnings "void"; package Type::Tiny; ((Scalar::Util::blessed($value) and $value->isa(q[JSON::Schema::Modern::Document::OpenAPI]))) or Type::Tiny::_failed_check($isa_check_for_openapi_5fdocument, "InstanceOf[\"JSON::Schema::Modern::Document::OpenAPI\"]", $value, "attribute_name","openapi_document","attribute_step","isa check","mgaca","0","varname","\$args->{\"openapi_document\"}"); $value }), # spent 33µs making 1 call to OpenAPI::Modern::BEGIN@48 # spent 8µs making 1 call to warnings::unimport # spent 1µs making 1 call to Scalar::Util::blessed # spent 0s making 1 call to UNIVERSAL::isa
49					$value
50					}
51					)),
52					return $new;
53					}
54	1	1µs			$$_UNQUOTED = \&new;
55					}
56	1	6µs			1;
57
58					;